home *** CD-ROM | disk | FTP | other *** search
/ Cine Live 69 / Cine Live 69.iso / pc / Data / Interface / e10s.k < prev    next >
Encoding:
Text File  |  2003-05-02  |  7.9 KB  |  283 lines

  1. module oRoot1 is cBox
  2. with 
  3.     Flags is $00000152; 
  4.     release Editor:
  5.         IOWindow is {$000002AC,$000000D4,$000001DA,$0000029A,$00000000,$00000000,$00000000,$00000000};
  6.         LayoutWindow is {$000000A1,$0000007B,$000002A0,$00000245,$00000000,$00000000,$00000064,$00000000};
  7.     end;
  8.     Name is "Root"; 
  9.     Enabled is false; 
  10.     
  11.     Width is 800; Height is 600; 
  12.     
  13.     Kind is DrawOpaque; 
  14.     Elements is [
  15.         oslide2,
  16.         oslide23,
  17.         oslide34,
  18.         oslide45
  19.     ];
  20.     Events is [
  21.         cOnscreenEvent
  22.         with Flags is $00000004; 
  23.             Commands is [
  24.                 cShowCommand
  25.                 with Flags is $00000004; Target is oslide2; end,
  26.                 cEnableCommand
  27.                 with Flags is $00000004; Target is oslide2; end,
  28.                 cFocusCommand
  29.                 with Target is oslide2; end,
  30.                 cRunCommand
  31.                 with Flags is $00000004; Target is oslide2; Rewind is true; end
  32.             ];
  33.         end
  34.     ];
  35. end;
  36.  
  37. object oslide2 is cImage
  38. with 
  39.     Flags is $00000010; 
  40.     Name is "slide"; 
  41.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  42.     
  43.     Width is 800; Height is 600; 
  44.     Duration is 2; Duration is 2; TimeScale is 1; 
  45.     URL is "../../Photos/Mais%20qui%20a%20tu%E9%20Pamela%20rose/AFF%20Pamela%20Rose.jpg"; 
  46.     
  47.     
  48.     Events is [
  49.         cKeyboardEvent
  50.         with Test is IsSpace; 
  51.             Commands is [
  52.                 cFocusCommand
  53.                 with Target is oTargetSelf; end,
  54.                 cRunCommand
  55.                 with Target is oTargetSelf; Mode is Toggle; end
  56.             ];
  57.         end,
  58.         cMouseUpEvent
  59.         with Flag is true; 
  60.             Commands is [
  61.                 cRunCommand
  62.                 with Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  63.                 cEnableCommand
  64.                 with Target is oTargetSelf; Mode is Clear; end,
  65.                 cShowCommand
  66.                 with Target is oTargetSelf; Mode is Clear; end,
  67.                 cRunCommand
  68.                 with Target is oslide23; Mode is Clear; Rewind is true; end,
  69.                 cEnableCommand
  70.                 with Target is oslide23; Mode is Clear; end,
  71.                 cShowCommand
  72.                 with Target is oslide23; Mode is Clear; end,
  73.                 cBackCommand
  74.                 with end
  75.             ];
  76.         end,
  77.         cFinishedEvent
  78.         with 
  79.             Commands is [
  80.                 cShowCommand
  81.                 with Target is oslide2; Mode is Clear; end,
  82.                 cEnableCommand
  83.                 with Target is oslide2; Mode is Clear; end,
  84.                 cRunCommand
  85.                 with Target is oslide2; Mode is Clear; Rewind is true; end,
  86.                 cFocusCommand
  87.                 with Target is oslide23; end,
  88.                 cShowCommand
  89.                 with Target is oslide23; end,
  90.                 cEnableCommand
  91.                 with Target is oslide23; end,
  92.                 cRunCommand
  93.                 with Target is oslide23; Rewind is true; end
  94.             ];
  95.         end
  96.     ];
  97. end;
  98.  
  99. object oslide23 is cImage
  100. with 
  101.     Flags is $00000150; 
  102.     Name is "slide2"; 
  103.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  104.     
  105.     Width is 800; Height is 600; 
  106.     Duration is 2; Duration is 2; TimeScale is 1; 
  107.     URL is "../../Photos/Mais%20qui%20a%20tu%E9%20Pamela%20rose/A%20Lartigau.jpg"; 
  108.     
  109.     
  110.     Events is [
  111.         cKeyboardEvent
  112.         with Flags is $00000004; Test is IsSpace; 
  113.             Commands is [
  114.                 cFocusCommand
  115.                 with Flags is $00000004; Target is oTargetSelf; end,
  116.                 cRunCommand
  117.                 with Flags is $00000004; Target is oTargetSelf; Mode is Toggle; end
  118.             ];
  119.         end,
  120.         cMouseUpEvent
  121.         with Flags is $00000004; Flag is true; 
  122.             Commands is [
  123.                 cEnableCommand
  124.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  125.                 cShowCommand
  126.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  127.                 cRunCommand
  128.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  129.                 cEnableCommand
  130.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  131.                 cShowCommand
  132.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  133.                 cRunCommand
  134.                 with Flags is $00000004; Target is oslide34; Mode is Clear; Rewind is true; end,
  135.                 cBackCommand
  136.                 with Flags is $00000004; end
  137.             ];
  138.         end,
  139.         cFinishedEvent
  140.         with Flags is $00000004; 
  141.             Commands is [
  142.                 cShowCommand
  143.                 with Flags is $00000004; Target is oslide23; Mode is Clear; end,
  144.                 cEnableCommand
  145.                 with Flags is $00000004; Target is oslide23; Mode is Clear; end,
  146.                 cRunCommand
  147.                 with Flags is $00000004; Target is oslide23; Mode is Clear; Rewind is true; end,
  148.                 cFocusCommand
  149.                 with Flags is $00000004; Target is oslide34; end,
  150.                 cShowCommand
  151.                 with Flags is $00000004; Target is oslide34; end,
  152.                 cEnableCommand
  153.                 with Flags is $00000004; Target is oslide34; end,
  154.                 cRunCommand
  155.                 with Flags is $00000004; Target is oslide34; Rewind is true; end
  156.             ];
  157.         end
  158.     ];
  159. end;
  160.  
  161. object oslide34 is cImage
  162. with 
  163.     Flags is $00000150; 
  164.     Name is "slide3"; 
  165.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  166.     
  167.     Width is 800; Height is 600; 
  168.     Duration is 2; Duration is 2; TimeScale is 1; 
  169.     URL is "../../Photos/Mais%20qui%20a%20tu%E9%20Pamela%20rose/Kad.jpg"; 
  170.     
  171.     
  172.     Events is [
  173.         cKeyboardEvent
  174.         with Flags is $00000004; Test is IsSpace; 
  175.             Commands is [
  176.                 cFocusCommand
  177.                 with Flags is $00000004; Target is oTargetSelf; end,
  178.                 cRunCommand
  179.                 with Flags is $00000004; Target is oTargetSelf; Mode is Toggle; end
  180.             ];
  181.         end,
  182.         cMouseUpEvent
  183.         with Flags is $00000004; Flag is true; 
  184.             Commands is [
  185.                 cEnableCommand
  186.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  187.                 cShowCommand
  188.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  189.                 cRunCommand
  190.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  191.                 cEnableCommand
  192.                 with Flags is $00000004; Target is oslide45; Mode is Clear; end,
  193.                 cShowCommand
  194.                 with Flags is $00000004; Target is oslide45; Mode is Clear; end,
  195.                 cRunCommand
  196.                 with Flags is $00000004; Target is oslide45; Mode is Clear; Rewind is true; end,
  197.                 cBackCommand
  198.                 with Flags is $00000004; end
  199.             ];
  200.         end,
  201.         cFinishedEvent
  202.         with Flags is $00000004; 
  203.             Commands is [
  204.                 cShowCommand
  205.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  206.                 cEnableCommand
  207.                 with Flags is $00000004; Target is oslide34; Mode is Clear; end,
  208.                 cRunCommand
  209.                 with Flags is $00000004; Target is oslide34; Mode is Clear; Rewind is true; end,
  210.                 cFocusCommand
  211.                 with Flags is $00000004; Target is oslide45; end,
  212.                 cShowCommand
  213.                 with Flags is $00000004; Target is oslide45; end,
  214.                 cEnableCommand
  215.                 with Flags is $00000004; Target is oslide45; end,
  216.                 cRunCommand
  217.                 with Flags is $00000004; Target is oslide45; Rewind is true; end
  218.             ];
  219.         end
  220.     ];
  221. end;
  222.  
  223. object oslide45 is cImage
  224. with 
  225.     Flags is $00000150; 
  226.     Name is "slide4"; 
  227.     Enabled is false; Shown is false; Cursor is oEmptyCursor; 
  228.     
  229.     Width is 800; Height is 600; 
  230.     Duration is 2; Duration is 2; TimeScale is 1; 
  231.     URL is "../../Photos/Mais%20qui%20a%20tu%E9%20Pamela%20rose/Olivier.jpg"; 
  232.     
  233.     
  234.     Events is [
  235.         cKeyboardEvent
  236.         with Flags is $00000004; Test is IsSpace; 
  237.             Commands is [
  238.                 cFocusCommand
  239.                 with Flags is $00000004; Target is oTargetSelf; end,
  240.                 cRunCommand
  241.                 with Flags is $00000004; Target is oTargetSelf; Mode is Toggle; end
  242.             ];
  243.         end,
  244.         cMouseUpEvent
  245.         with Flags is $00000004; Flag is true; 
  246.             Commands is [
  247.                 cEnableCommand
  248.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  249.                 cShowCommand
  250.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; end,
  251.                 cRunCommand
  252.                 with Flags is $00000004; Target is oTargetSelf; Mode is Clear; Rewind is true; end,
  253.                 cEnableCommand
  254.                 with Flags is $00000004; Target is oslide2; Mode is Clear; end,
  255.                 cShowCommand
  256.                 with Flags is $00000004; Target is oslide2; Mode is Clear; end,
  257.                 cRunCommand
  258.                 with Flags is $00000004; Target is oslide2; Mode is Clear; Rewind is true; end,
  259.                 cBackCommand
  260.                 with Flags is $00000004; end
  261.             ];
  262.         end,
  263.         cFinishedEvent
  264.         with Flags is $00000004; 
  265.             Commands is [
  266.                 cShowCommand
  267.                 with Flags is $00000004; Target is oslide45; Mode is Clear; end,
  268.                 cEnableCommand
  269.                 with Flags is $00000004; Target is oslide45; Mode is Clear; end,
  270.                 cRunCommand
  271.                 with Flags is $00000004; Target is oslide45; Mode is Clear; Rewind is true; end,
  272.                 cFocusCommand
  273.                 with Flags is $00000004; Target is oslide2; end,
  274.                 cShowCommand
  275.                 with Flags is $00000004; Target is oslide2; end,
  276.                 cEnableCommand
  277.                 with Flags is $00000004; Target is oslide2; end,
  278.                 cRunCommand
  279.                 with Flags is $00000004; Target is oslide2; Rewind is true; end
  280.             ];
  281.         end
  282.     ];
  283. end;